1. SQL Anywhere Studio 9.0.2
2. Visual Studio 2005
3. Windows Mobile 5.0 SDK (マイクロソフト社から無料で入手できます)

1. Visual Studio 2005 で、新規の携帯機器プロジェクトを作成する
2. Ultra Light .NET インタフェースを使用する環境を設定する
3. Ultra Light データベースを作成し、プロジェクトに追加する
4. DataGrid のコンポーネントをフォームに追加する
5. DataGrid オブジェクトの移植に必要なコードを追加する
6. Windows Mobile 5.0 エミュレータを使用するアプリケーションを配備する

• Visual Studio 2005 および Visual Basic .NET
• .NET framework 1.1 および 2.0
• UltraLight

• [ファイル] > [新しいプロジェクト] を選択する
• [Visual Basic] > [スマートデバイス] > [Windows Mobile 5.0 Pocket PC] を選択し、以下のように[デバイスアプリケーション] を選択する

• [プロジェクト] > [参照の追加] を選択する
  
• 以下のリファレンスを追加する
  
  o iAnywhere.Data.Ultralite (CE) (9.x.x version)
  o iAnywhere.Data.Ultralite (CE) JA (9.x.x version)
  o System.Data
  o System.Xml
  
• [プロジェクト-] > [既存項目の追加] を選択する
  
• 以下の Ultra Light .NET のランタイム・ディレクトリにナビゲートする
  
  %asany9%\ultralite\UltraLite.NET\ce\arm
  

• [ビルドアクション] を [コンテンツ] に変更する
• [出力ディレクトリにコピー] を [新しい場合はコピーする] に変更する
  

• [スタート] > [すべてのプログラム] > [SQL Anywhere 9] > [Ultra Light] > [Ultra Light SchemaPainter] を選択する
• [ファイル] > [新規作成] > [Ultra Light Schema] を選択する

• "id” は、デフォルトのグローバル・オート・インクリメントであるinteger とする
• プライマリ・キーとして [id] を選択し、昇順として設定する
• [name] は、デフォルトなしで 30 文字のchar とする

• [スタート] > [ファイル名を指定して実行] を選択して “cmd” と入力し、[OK] をクリックする
  
• 次に、作成した .usm ファイルにある Ultra Light Schema ファイルを保存したディレクトリに進む
• 以下のコマンドを入力して、データベースを作成する
  　　　ulcreate -s ULDatabase.usm -c "uid=dba;pwd=sql;dbf=ULDatabase.udb"
  
• [スタート] > [ファイル名を指定して実行] を選択して以下のように ulisql と入力したら、[OK] をクリックする

• 次の画面が表示されたら、以下に従って入力する。ここで隠されているパスワードは、“sql”

• [OK] をクリックする
• 画面上で以下のコマンドを入力し、[F5] を押してコマンドを実行する
  　　　　　　INSERT INTO demo VALUES (1,'John')
• 毎回数値をインクリメントし、“John” の代わりに値を変更することで、複数の値を挿入する
  
• コマンドとして “COMMIT” と入力し、[F5] を押してプログラムを終了する

• ULDatabase.udb と ULDatabase.usm ファイルをプロジェクトに追加する

Imports System
Imports System.Data
Imports iAnywhere.Data.UltraLite
Imports System.xml

Dim myConnectionParms As New ULConnectionParms()
' Setup the connection parameters
myConnectionParms.UserID = "dba"
myConnectionParms.Password = "sql"
myConnectionParms.DatabaseOnCE = "\Program
Files\VBNetTutorial\ULDatabase.udb"
myConnectionParms.SchemaOnCE = "\Program
Files\VBNetTutorial\ULDatabase.usm"
' Create new connection and open it
Dim con As ULConnection = New ULConnection(myConnectionParms.ToString)
con.Open()
' Create DataAdapter to define where to pull data from
Dim adapter As ULDataAdapter = New ULDataAdapter("SELECT * FROM demo",
con)
' Create DataSet to represent the disconnected data
Dim ds As New DataSet()
' Populate the dataset based on the DataAdapters parameters
adapter.Fill(ds)
' Disconect from the Database
con.Close()
' Bind the data to the DataGrid
dgData.DataSource = ds.Tables(0)